(finder-compile-keywords-make-dist):

Use the dirs specified on the command line.

diff --git a/lisp/finder.el b/lisp/finder.el
index 3d93cba79d5ab0bbfef9e3e175c9370c751a54ba..d86a18ea779d5f3ed731d1ec950d52e5122b3484 100644 (file)
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -149,7 +149,8 @@ arguments compiles from `load-path'."
 
 (defun finder-compile-keywords-make-dist ()
   "Regenerate `finder-inf.el' for the Emacs distribution."
-  (finder-compile-keywords default-directory))
+  (apply 'finder-compile-keywords command-line-args-left)
+  (kill-emacs))
 
 ;;; Now the retrieval code